Casovy server
Otázka od: Viktor Marek
7. 11. 2003 16:41
Zdravim
Chtel bych si napsat utilitku, ktera by po nejakem nastavenem case sahla na
casovy server a srovnala cas na PC s WIN2000 pripadne WIN98,WINME, WINXP.
Poradi nekdo jak na to?
[D5 Profesional]
Diky
Viktor Marek
viktor@mbox.vol.cz
----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)
Odpovedá: Petr Zahradnik
7. 11. 2003 16:21
Puvodni zprava ze dne 7.11.2003:
> Chtel bych si napsat utilitku, ktera by po nejakem nastavenem case sahla na
> casovy server a srovnala cas na PC s WIN2000 pripadne WIN98,WINME, WINXP.
Zrovna pred par dny jsem to sem psal:
Koukni se na tohle: http://sourceforge.net/projects/nettime
To je open source soft na synchronizaci casu, funguje to jako program
(server i klient) a soucasne k tomu jsou zdrojaky v Delphi. Tak si to
muzes i upravit a vylepsit.
Ja to uz delsi dobu bez problemu pouzivam na sve siti tak, ze server
se mi synchronizuje s Internetem a klienti se mi zase synchronizuji se
serverem.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
Obvodova 740/14, 400 07 Usti nad Labem
telefon: 475 501 627, mobil: 602 409 601, fax: 475 511 338
web: http://www.clexpert.cz, e-mail: clexpert@clexpert.cz
ICQ: 21215917, MSN: clexpert@clexpert.cz
==========================================================
----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)
Odpovedá: Vit Tichy
7. 11. 2003 17:12
Joha Viktor,
V> Chtel bych si napsat utilitku, ktera by po nejakem nastavenem case sahla na
V> casovy server a srovnala cas na PC s WIN2000 pripadne WIN98,WINME, WINXP.
V> Poradi nekdo jak na to?
Stahni synapsi, tam to vsechno je.
Pak nejak takto:
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// - vraci cas z NTP serveru ve formatu UTC
function _getTimeFromNTPServer(const NTPServer:string):TDateTime;
var sntp:TSntpSend;
begin
result := 0;
sntp := TSntpSend.Create();
try
sntp.TargetHost := NTPServer;
if(sntp.GetNTP)then
result := sntp.NTPTime;
finally
sntp.Free();
end;
end;
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
Jeste prevedes UTC cas na lokalni a jsi vysmaty 
--
vt
----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)
Odpovedá: Lukas Gebauer
8. 11. 2003 10:02
> V> Chtel bych si napsat utilitku, ktera by po nejakem nastavenem case sahla
na
> V> casovy server a srovnala cas na PC s WIN2000 pripadne WIN98,WINME, WINXP.
> Stahni synapsi, tam to vsechno je.
> Pak nejak takto:
[...]
>
> Jeste prevedes UTC cas na lokalni a jsi vysmaty
No to ani nemusis, protoze Windows maji funkce na nastavovani casu
pracujici primo v UTC. Ba co vic, v pripade sntpsendu ze synapse
staci zapnout property SyncTime a ono ti to seridi cas samo. 
--
Lukas Gebauer.
E-mail: gebauerl@mlp.cz
http://www.ararat.cz/synapse/ - Ararat Synapse - TCP/IP Lib.
----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)
Odpovedá: Viktor Marek
8. 11. 2003 11:34
Zdravim
Muzu pozadat o ukazku jak napsat kod okolo "sntpsendu"
Diky
Viktor Marek
viktor@mbox.vol.cz
> > V> Chtel bych si napsat utilitku, ktera by po nejakem nastavenem case
sahla na
> > V> casovy server a srovnala cas na PC s WIN2000 pripadne WIN98,WINME,
WINXP.
> > Stahni synapsi, tam to vsechno je.
> > Pak nejak takto:
> > Jeste prevedes UTC cas na lokalni a jsi vysmaty
> No to ani nemusis, protoze Windows maji funkce na nastavovani casu
> pracujici primo v UTC. Ba co vic, v pripade sntpsendu ze synapse
> staci zapnout property SyncTime a ono ti to seridi cas samo.
----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)
Odpovedá: Lukas Gebauer
8. 11. 2003 11:57
> Muzu pozadat o ukazku jak napsat kod okolo "sntpsendu"
procedure TForm1.Button7Click(Sender: TObject);
var
ntp:TSNtpSend;
begin
ntp:=TSNtpSend.Create;
try
ntp.TargetHost:='tvuj_casovy_server';
ntp.SyncTime := True;
ntp.getsntp;
finally
ntp.Free;
end;
end;
Jednoduche, ne?
Misto 'tvuj_casovy_server' dosad adresu tveho casoveho serveru, ktery
poskytuje cas pomoci NTP nebo SNTP protokolu.
To muze but bud nejaky tvuj router (treba moje oblibene Cisco),
nejake tvoje synchronizovane Windows (treba na WinXP je stadardne NTP
server i klient), nebo treba nejaky z casovych serveru na internetu.
--
Lukas Gebauer.
E-mail: gebauerl@mlp.cz
http://www.ararat.cz/synapse/ - Ararat Synapse - TCP/IP Lib.
----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)
Odpovedá: Viktor Marek
8. 11. 2003 13:15
Diky
Viktor Marek
viktor@mbox.vol.cz
> > Muzu pozadat o ukazku jak napsat kod okolo "sntpsendu"
----------
* www.inMail.sk - Vasa emailova adresa na cely zivot ZDARMA
* Mail neobsahuje virusy. Zkontrolovane antivirusom NOD32 (www.eset.sk)
* www.SlovakNET.sk - profesionalny webhosting, domena .SK ZADARMO
* Zoner Media Explorer 5 - stiahnite si pomocnika pre digitalnu fotografiu
(zme.zoner.sk)